inherited frmFixAssetCard: TfrmFixAssetCard
  Left = 371
  Top = 184
  Caption = #22266#23450#36164#20135#21345#29255
  ClientHeight = 465
  ClientWidth = 692
  FormStyle = fsStayOnTop
  ExplicitWidth = 710
  ExplicitHeight = 511
  DesignSize = (
    692
    465)
  PixelsPerInch = 119
  TextHeight = 12
  inherited pnlBottom: TPanel
    Top = 405
    Width = 692
    ExplicitTop = 405
    ExplicitWidth = 692
    DesignSize = (
      692
      60)
    inherited Bevel1: TBevel
      Width = 692
      ExplicitWidth = 605
    end
    inherited btnOK: TBitBtn
      Left = 499
      Top = 20
      ExplicitLeft = 499
      ExplicitTop = 20
    end
    inherited btnCancel: TBitBtn
      Left = 592
      Top = 20
      ExplicitLeft = 592
      ExplicitTop = 20
    end
    inherited btnContinue: TBitBtn
      Top = 20
      ExplicitTop = 20
    end
    inherited btnPri: TBitBtn
      Top = 20
      ExplicitTop = 20
    end
    inherited btnNext: TBitBtn
      Top = 20
      ExplicitTop = 20
    end
    inherited btnBaseEditSave: TBitBtn
      Top = 20
      ExplicitTop = 20
    end
  end
  object PageControl1: TPageControl [1]
    Left = 0
    Top = 45
    Width = 692
    Height = 360
    ActivePage = tsBaseInfo
    Align = alClient
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    Style = tsButtons
    TabOrder = 3
    OnEnter = grdAttachSubjectEnter
    object tsBaseInfo: TTabSheet
      Caption = #22522#26412#20449#24687
      ImageIndex = 3
      object pnl1: TPanel
        Left = 0
        Top = 0
        Width = 684
        Height = 329
        Align = alClient
        BevelOuter = bvNone
        Color = 16773345
        TabOrder = 0
        object lblFASub: TcxLabel
          Left = 24
          Top = 218
          Caption = #22266#23450#36164#20135#31185#30446#65306
          ParentFont = False
          Style.Font.Charset = GB2312_CHARSET
          Style.Font.Color = clBlue
          Style.Font.Height = -12
          Style.Font.Name = #23435#20307
          Style.Font.Style = []
          Style.IsFontAssigned = True
          Transparent = True
        end
        object cxLabel5: TcxLabel
          Left = 48
          Top = 179
          Caption = #35268#26684#22411#21495#65306
          Transparent = True
        end
        object lblFAType: TcxLabel
          Left = 24
          Top = 141
          Caption = #22266#23450#36164#20135#31867#21035#65306
          ParentFont = False
          Style.Font.Charset = GB2312_CHARSET
          Style.Font.Color = clBlue
          Style.Font.Height = -12
          Style.Font.Name = #23435#20307
          Style.Font.Style = []
          Style.IsFontAssigned = True
          Transparent = True
        end
        object cxLabel3: TcxLabel
          Left = 24
          Top = 102
          Caption = #22266#23450#36164#20135#21517#31216#65306
          ParentFont = False
          Style.Font.Charset = GB2312_CHARSET
          Style.Font.Color = clBlue
          Style.Font.Height = -12
          Style.Font.Name = #23435#20307
          Style.Font.Style = []
          Style.IsFontAssigned = True
          Transparent = True
        end
        object lblLocated: TcxLabel
          Left = 308
          Top = 257
          Caption = #23384#25918#20301#32622#65306
          Transparent = True
        end
        object cxLabel2: TcxLabel
          Left = 24
          Top = 63
          Caption = #22266#23450#36164#20135#32534#21495#65306
          ParentFont = False
          Style.Font.Charset = GB2312_CHARSET
          Style.Font.Color = clBlue
          Style.Font.Height = -12
          Style.Font.Name = #23435#20307
          Style.Font.Style = []
          Style.IsFontAssigned = True
          Transparent = True
        end
        object lblUsedDate: TcxLabel
          Left = 308
          Top = 218
          Caption = #20837#36134#26085#26399#65306
          ParentFont = False
          Style.Font.Charset = GB2312_CHARSET
          Style.Font.Color = clBlue
          Style.Font.Height = -12
          Style.Font.Name = #23435#20307
          Style.Font.Style = []
          Style.IsFontAssigned = True
          Transparent = True
        end
        object lblStatus: TcxLabel
          Left = 308
          Top = 179
          Caption = #20351#29992#29366#20917#65306
          ParentFont = False
          Style.Font.Charset = GB2312_CHARSET
          Style.Font.Color = clBlue
          Style.Font.Height = -12
          Style.Font.Name = #23435#20307
          Style.Font.Style = []
          Style.IsFontAssigned = True
          Transparent = True
        end
        object lblNewType: TcxLabel
          Left = 308
          Top = 141
          Caption = #22686#21152#26041#24335#65306
          ParentFont = False
          Style.Font.Charset = GB2312_CHARSET
          Style.Font.Color = clBlue
          Style.Font.Height = -12
          Style.Font.Name = #23435#20307
          Style.Font.Style = []
          Style.IsFontAssigned = True
          Transparent = True
        end
        object cxLabel16: TcxLabel
          Left = 332
          Top = 102
          Caption = #20135#22320#65306
          Transparent = True
        end
        object cxLabel15: TcxLabel
          Left = 320
          Top = 63
          Caption = #21046#36896#21830#65306
          Transparent = True
        end
        object cxLabel14: TcxLabel
          Left = 320
          Top = 24
          Caption = #20379#24212#21830#65306
          Transparent = True
        end
        object lblTaxSubID: TcxLabel
          Left = 12
          Top = 296
          Caption = #36827#39033#31246#26680#31639#31185#30446#65306
          ParentFont = False
          Style.Font.Charset = GB2312_CHARSET
          Style.Font.Color = clBlue
          Style.Font.Height = -12
          Style.Font.Name = #23435#20307
          Style.Font.Style = []
          Style.IsFontAssigned = True
          Transparent = True
        end
        object lblDprSub: TcxLabel
          Left = 24
          Top = 257
          Caption = #32047#35745#25240#26087#31185#30446#65306
          ParentFont = False
          Style.Font.Charset = GB2312_CHARSET
          Style.Font.Color = clBlue
          Style.Font.Height = -12
          Style.Font.Name = #23435#20307
          Style.Font.Style = []
          Style.IsFontAssigned = True
          Transparent = True
        end
        object cxLabel1: TcxLabel
          Left = 24
          Top = 24
          Caption = #36164#20135#21345#29255#32534#21495#65306
          ParentFont = False
          Style.Font.Charset = GB2312_CHARSET
          Style.Font.Color = clBlue
          Style.Font.Height = -12
          Style.Font.Name = #23435#20307
          Style.Font.Style = []
          Style.IsFontAssigned = True
          Transparent = True
        end
        object cxdbdtdtUsedDate: TcxDBDateEdit
          Left = 376
          Top = 216
          DataBinding.DataField = 'useddate'
          DataBinding.DataSource = MainDataSource
          Properties.ImmediatePost = True
          TabOrder = 28
          Width = 150
        end
        object cbbStatus: TcxDBLookupComboBox
          Tag = 104
          Left = 376
          Top = 177
          DataBinding.DataField = 'statusid'
          DataBinding.DataSource = MainDataSource
          Properties.ImmediatePost = True
          Properties.ListColumns = <>
          TabOrder = 27
          Width = 150
        end
        object cbbNewType: TcxDBLookupComboBox
          Tag = 103
          Left = 376
          Top = 139
          DataBinding.DataField = 'newtypeid'
          DataBinding.DataSource = MainDataSource
          Properties.ImmediatePost = True
          Properties.ListColumns = <>
          TabOrder = 26
          Width = 150
        end
        object cbbFAType: TcxDBLookupComboBox
          Tag = 102
          Left = 120
          Top = 139
          DataBinding.DataField = 'fatypeid'
          DataBinding.DataSource = MainDataSource
          Properties.ImmediatePost = True
          Properties.ListColumns = <>
          TabOrder = 19
          Width = 150
        end
        object cbbFASub: TcxDBLookupComboBox
          Tag = 63
          Left = 120
          Top = 216
          DataBinding.DataField = 'astsubid'
          DataBinding.DataSource = MainDataSource
          Properties.ImmediatePost = True
          Properties.ListColumns = <>
          TabOrder = 21
          Width = 150
        end
        object cbbDprSub: TcxDBLookupComboBox
          Tag = 63
          Left = 120
          Top = 255
          DataBinding.DataField = 'dprsubid'
          DataBinding.DataSource = MainDataSource
          Properties.ImmediatePost = True
          Properties.ListColumns = <>
          TabOrder = 22
          Width = 150
        end
        object cbbTaxSubId: TcxDBLookupComboBox
          Tag = 63
          Left = 118
          Top = 294
          DataBinding.DataField = 'taxsubid'
          DataBinding.DataSource = MainDataSource
          Properties.ImmediatePost = True
          Properties.ListColumns = <>
          TabOrder = 15
          Width = 150
        end
        object cxdbedtFACardCode: TcxDBTextEdit
          Left = 120
          Top = 22
          DataBinding.DataField = 'cardcode'
          DataBinding.DataSource = MainDataSource
          TabOrder = 16
          Width = 150
        end
        object cxdbedtFACode: TcxDBTextEdit
          Left = 120
          Top = 61
          DataBinding.DataField = 'assetcode'
          DataBinding.DataSource = MainDataSource
          TabOrder = 17
          Width = 150
        end
        object cxdbedtFAName: TcxDBTextEdit
          Left = 120
          Top = 100
          DataBinding.DataField = 'name'
          DataBinding.DataSource = MainDataSource
          TabOrder = 18
          Width = 150
        end
        object cxdbedtFASpeci: TcxDBTextEdit
          Left = 120
          Top = 177
          DataBinding.DataField = 'specific'
          DataBinding.DataSource = MainDataSource
          TabOrder = 20
          Width = 150
        end
        object cxdbedtProvider: TcxDBTextEdit
          Left = 376
          Top = 22
          DataBinding.DataField = 'vendorname'
          DataBinding.DataSource = MainDataSource
          TabOrder = 23
          Width = 150
        end
        object cxdbedtMaker: TcxDBTextEdit
          Left = 376
          Top = 61
          DataBinding.DataField = 'producename'
          DataBinding.DataSource = MainDataSource
          TabOrder = 24
          Width = 150
        end
        object cxdbedtAddress: TcxDBTextEdit
          Left = 376
          Top = 100
          DataBinding.DataField = 'addr'
          DataBinding.DataSource = MainDataSource
          TabOrder = 25
          Width = 150
        end
        object cxdbedtLocated: TcxDBTextEdit
          Left = 376
          Top = 255
          DataBinding.DataField = 'location'
          DataBinding.DataSource = MainDataSource
          TabOrder = 29
          Width = 150
        end
      end
    end
    object tsDprInfo: TTabSheet
      Caption = #25240#26087#20449#24687
      ImageIndex = 2
      object pnl2: TPanel
        Left = 0
        Top = 0
        Width = 684
        Height = 329
        Align = alClient
        BevelOuter = bvNone
        Color = 16773345
        TabOrder = 0
      end
      object cbbDeprMethod: TcxDBLookupComboBox
        Tag = 68
        Left = 96
        Top = 14
        DataBinding.DataField = 'deprmethodid'
        DataBinding.DataSource = MainDataSource
        Properties.ImmediatePost = True
        Properties.ListColumns = <>
        Properties.OnChange = cbbDeprMethodPropertiesChange
        TabOrder = 1
        Width = 150
      end
      object cbbForeigncurid: TcxDBLookupComboBox
        Tag = 24
        Left = 96
        Top = 198
        DataBinding.DataField = 'foreigncurid'
        DataBinding.DataSource = MainDataSource
        Properties.ImmediatePost = True
        Properties.ListColumns = <>
        TabOrder = 2
        Width = 150
      end
      object cxdbedtForeignamt: TcxDBTextEdit
        Left = 96
        Top = 228
        DataBinding.DataField = 'foreignamt'
        DataBinding.DataSource = MainDataSource
        TabOrder = 3
        Width = 150
      end
      object cxdbedtNetValue: TcxDBTextEdit
        Left = 408
        Top = 44
        DataBinding.DataField = 'NetValue'
        DataBinding.DataSource = MainDataSource
        TabOrder = 4
        Width = 150
      end
      object cxdbedtPlanusemonth: TcxDBTextEdit
        Left = 408
        Top = 138
        DataBinding.DataField = 'planusemonth'
        DataBinding.DataSource = MainDataSource
        TabOrder = 5
        Width = 121
      end
      object cxdbedtPlanworkvalue: TcxDBTextEdit
        Left = 408
        Top = 138
        DataBinding.DataField = 'planworkvalue'
        DataBinding.DataSource = MainDataSource
        TabOrder = 6
        Width = 150
      end
      object cxdbedtPrice: TcxDBTextEdit
        Left = 96
        Top = 106
        DataBinding.DataField = 'price'
        DataBinding.DataSource = MainDataSource
        TabOrder = 7
        Width = 150
      end
      object cxdbedtQuantity: TcxDBTextEdit
        Left = 96
        Top = 138
        DataBinding.DataField = 'quantity'
        DataBinding.DataSource = MainDataSource
        TabOrder = 8
        Width = 150
      end
      object cxdbedtRawamt: TcxDBTextEdit
        Left = 96
        Top = 293
        DataBinding.DataField = 'rawamt'
        DataBinding.DataSource = MainDataSource
        TabOrder = 9
        Width = 150
      end
      object cxdbedtRemainamt: TcxDBTextEdit
        Left = 408
        Top = 106
        DataBinding.DataField = 'remainamt'
        DataBinding.DataSource = MainDataSource
        TabOrder = 10
        Width = 150
      end
      object cxdbedtRemainrate: TcxDBTextEdit
        Left = 408
        Top = 73
        DataBinding.DataField = 'remainrate'
        DataBinding.DataSource = MainDataSource
        TabOrder = 11
        Width = 150
      end
      object cxdbedtStartrawamt: TcxDBTextEdit
        Left = 96
        Top = 262
        DataBinding.DataField = 'startrawamt'
        DataBinding.DataSource = MainDataSource
        TabOrder = 12
        Width = 150
      end
      object cxdbedtSumdepramt: TcxDBTextEdit
        Left = 408
        Top = 14
        DataBinding.DataField = 'sumdepramt'
        DataBinding.DataSource = MainDataSource
        TabOrder = 13
        Width = 150
      end
      object cxdbedtSumusedmonth: TcxDBTextEdit
        Left = 408
        Top = 168
        DataBinding.DataField = 'sumusedmonth'
        DataBinding.DataSource = MainDataSource
        TabOrder = 14
        Width = 121
      end
      object cxdbedtSumworkedvalue: TcxDBTextEdit
        Left = 408
        Top = 168
        DataBinding.DataField = 'sumworkedvalue'
        DataBinding.DataSource = MainDataSource
        TabOrder = 15
        Width = 150
      end
      object cxdbedtUnit: TcxDBTextEdit
        Left = 96
        Top = 168
        DataBinding.DataField = 'unit'
        DataBinding.DataSource = MainDataSource
        TabOrder = 16
        Width = 150
      end
      object cxdbedtWorkunit: TcxDBTextEdit
        Left = 408
        Top = 198
        DataBinding.DataField = 'workunit'
        DataBinding.DataSource = MainDataSource
        TabOrder = 17
        Visible = False
        Width = 150
      end
      object cxdbrdgrpDeprOption: TcxDBRadioGroup
        Left = 16
        Top = 36
        Caption = #26041#27861
        DataBinding.DataField = 'deproption'
        DataBinding.DataSource = MainDataSource
        Properties.ImmediatePost = True
        Properties.Items = <
          item
            Caption = #25353#21407#20540#25110#39044#35745#20351#29992#26399#38388#35745#25552#25240#26087
            Value = False
          end
          item
            Caption = #25353#20928#20540#25110#21097#20313#20351#29992#26399#38388#35745#25552#25240#26087
            Value = True
          end>
        TabOrder = 18
        Height = 58
        Width = 230
      end
      object cxLabel22: TcxLabel
        Left = 336
        Top = 16
        Caption = #32047#31215#25240#26087#65306
        Transparent = True
      end
      object cxLabel23: TcxLabel
        Left = 312
        Top = 77
        Caption = #39044#35745#20928#20540#27531#29575#65306
        Transparent = True
      end
      object cxLabel24: TcxLabel
        Left = 48
        Top = 108
        Caption = #21333#20215#65306
        Transparent = True
      end
      object cxLabel25: TcxLabel
        Left = 48
        Top = 140
        Caption = #25968#37327#65306
        Transparent = True
      end
      object cxLabel26: TcxLabel
        Left = 48
        Top = 170
        Caption = #21333#20301#65306
        Transparent = True
      end
      object cxLabel27: TcxLabel
        Left = 48
        Top = 200
        Caption = #24065#31181#65306
        Transparent = True
      end
      object cxLabel28: TcxLabel
        Left = 24
        Top = 232
        Caption = #22806#24065#37329#39069#65306
        Transparent = True
      end
      object cxLabel29: TcxLabel
        Left = 24
        Top = 264
        Caption = #21407#22987#21407#20540#65306
        Transparent = True
      end
      object cxLabel31: TcxLabel
        Left = 360
        Top = 48
        Caption = #20928#20540#65306
        Transparent = True
      end
      object cxLabel32: TcxLabel
        Left = 324
        Top = 108
        Caption = #39044#35745#20928#27531#20540#65306
        Transparent = True
      end
      object cxLabel33: TcxLabel
        Left = 312
        Top = 140
        Caption = #39044#35745#20351#29992#26376#20221#65306
        Transparent = True
      end
      object cxLabel34: TcxLabel
        Left = 324
        Top = 170
        Caption = #24050#35760#25552#26376#20221#65306
        Transparent = True
      end
      object cxLabel35: TcxLabel
        Left = 324
        Top = 200
        Caption = #24037#20316#37327#21333#20301#65306
        Transparent = True
        Visible = False
      end
      object cxLabel36: TcxLabel
        Left = 24
        Top = 295
        Caption = #20837#36134#21407#20540#65306
        Transparent = True
      end
      object cxLabel7: TcxLabel
        Left = 560
        Top = 77
        Caption = '%'
      end
      object cxLabel8: TcxLabel
        Left = 560
        Top = 264
        Caption = '%'
      end
      object edtMonthdepramt: TcxDBTextEdit
        Left = 408
        Top = 293
        DataBinding.DataField = 'monthdepramt'
        DataBinding.DataSource = MainDataSource
        Properties.ReadOnly = True
        TabOrder = 35
        Width = 150
      end
      object edtMonthdeprrate: TcxDBTextEdit
        Left = 408
        Top = 262
        DataBinding.DataField = 'monthdeprrate'
        DataBinding.DataSource = MainDataSource
        Properties.ReadOnly = True
        TabOrder = 36
        Width = 150
      end
      object lblDeprMethod: TcxLabel
        Left = 24
        Top = 16
        Caption = #25240#26087#26041#27861#65306
        ParentFont = False
        Style.Font.Charset = GB2312_CHARSET
        Style.Font.Color = clBlue
        Style.Font.Height = -12
        Style.Font.Name = #23435#20307
        Style.Font.Style = []
        Style.IsFontAssigned = True
        Transparent = True
      end
      object lblMonthDeprAmt: TcxLabel
        Left = 336
        Top = 295
        Caption = #26376#25240#26087#39069#65306
        Transparent = True
      end
      object lblMonthDeprRate: TcxLabel
        Left = 336
        Top = 264
        Caption = #26376#25240#26087#29575#65306
        Transparent = True
      end
    end
    object tsAttach: TTabSheet
      Caption = #38468#23646#35774#22791
      object pnl3: TPanel
        Left = 0
        Top = 0
        Width = 684
        Height = 329
        Align = alClient
        BevelOuter = bvNone
        Caption = 'pnl3'
        Color = 16773345
        TabOrder = 0
        object grdAttach: TcxGrid
          Left = 0
          Top = 0
          Width = 684
          Height = 329
          Align = alClient
          PopupMenu = pmGrid
          TabOrder = 0
          OnEnter = grdAttachSubjectEnter
          object viewAttach: TcxGridDBTableView
            Navigator.Buttons.CustomButtons = <>
            DataController.DataSource = dsAttach
            DataController.Summary.DefaultGroupSummaryItems = <>
            DataController.Summary.FooterSummaryItems = <>
            DataController.Summary.SummaryGroups = <>
            OptionsBehavior.FocusCellOnTab = True
            OptionsBehavior.FocusFirstCellOnNewRecord = True
            OptionsBehavior.GoToNextCellOnEnter = True
            OptionsBehavior.FocusCellOnCycle = True
            OptionsView.GroupByBox = False
            Styles.Background = MainDM.bslBackGroup
            Styles.ContentEven = MainDM.bsEven
            Styles.ContentOdd = MainDM.bsOdd
            Styles.Footer = MainDM.bsTitle
            Styles.Header = MainDM.bsTitle
            Styles.Selection = MainDM.bsSelect
            object cxgrdbclmnName: TcxGridDBColumn
              Caption = #35774#22791#21517#31216
              DataBinding.FieldName = 'name'
              Width = 89
            end
            object cxgrdbclmnSpecific: TcxGridDBColumn
              Caption = #35268#26684#22411#21495
              DataBinding.FieldName = 'specific'
              Width = 110
            end
            object cxgrdbclmnUnit: TcxGridDBColumn
              Caption = #35745#37327#21333#20301
              DataBinding.FieldName = 'unit'
            end
            object cxgrdbclmnQuantity: TcxGridDBColumn
              Caption = #25968#37327
              DataBinding.FieldName = 'quantity'
            end
            object cxgrdbclmnAmount: TcxGridDBColumn
              Caption = #37329#39069
              DataBinding.FieldName = 'amount'
              Width = 76
            end
            object cxgrdbclmnUsedate: TcxGridDBColumn
              Caption = #21551#29992#26085#26399
              DataBinding.FieldName = 'usedate'
              Width = 127
            end
            object cxgrdbclmnRemark: TcxGridDBColumn
              Caption = #22791#27880
              DataBinding.FieldName = 'remark'
              Width = 79
            end
          end
          object lvlAttach: TcxGridLevel
            GridView = viewAttach
          end
        end
      end
    end
    object tsDpt: TTabSheet
      Caption = #25152#23646#37096#38376
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ImageIndex = 3
      ParentFont = False
      object pnl8: TPanel
        Left = 0
        Top = 0
        Width = 684
        Height = 35
        Align = alClient
        BevelOuter = bvNone
        Color = 16773345
        TabOrder = 3
      end
      object pnl4: TPanel
        Left = 0
        Top = 35
        Width = 684
        Height = 294
        Align = alBottom
        BevelOuter = bvNone
        Caption = 'pnl4'
        Color = 16773345
        TabOrder = 0
        object grdOwnerDpt: TcxGrid
          Left = 0
          Top = 0
          Width = 684
          Height = 294
          Align = alClient
          PopupMenu = pmGrid
          TabOrder = 0
          OnEnter = grdAttachSubjectEnter
          object viewOwnerDpt: TcxGridDBTableView
            Navigator.Buttons.CustomButtons = <>
            DataController.DataSource = dsOwnerDep
            DataController.Summary.DefaultGroupSummaryItems = <>
            DataController.Summary.FooterSummaryItems = <>
            DataController.Summary.SummaryGroups = <>
            OptionsBehavior.FocusCellOnTab = True
            OptionsBehavior.FocusFirstCellOnNewRecord = True
            OptionsBehavior.GoToNextCellOnEnter = True
            OptionsBehavior.FocusCellOnCycle = True
            OptionsView.ColumnAutoWidth = True
            OptionsView.GroupByBox = False
            Styles.Background = MainDM.bslBackGroup
            Styles.ContentEven = MainDM.bsEven
            Styles.ContentOdd = MainDM.bsOdd
            Styles.Footer = MainDM.bsTitle
            Styles.Header = MainDM.bsTitle
            Styles.Selection = MainDM.bsSelect
            object cxgrdbclmnDeptInfo: TcxGridDBColumn
              Caption = #20351#29992#37096#38376#21517#31216
              DataBinding.FieldName = 'deptid'
              Width = 188
            end
            object cxgrdbclmnOwnerRate: TcxGridDBColumn
              Caption = #20351#29992#27604#20363#65288'%'#65289
              DataBinding.FieldName = 'ownerrate'
              Width = 161
            end
            object cxgrdbclmnSubtDeprName: TcxGridDBColumn
              Caption = #23545#24212#25240#26087#31185#30446#21517#31216
              DataBinding.FieldName = 'subjectid'
              Width = 132
            end
          end
          object lvlOwnerDpt: TcxGridLevel
            GridView = viewOwnerDpt
          end
        end
      end
      object cxLabel38: TcxLabel
        Left = 16
        Top = 10
        Caption = #26426#26500#21517#31216#65306
        Transparent = True
      end
      object cbbFildName: TcxDBLookupComboBox
        Tag = 5
        Left = 80
        Top = 8
        DataBinding.DataField = 'filid'
        DataBinding.DataSource = MainDataSource
        Properties.ImmediatePost = True
        Properties.ListColumns = <>
        TabOrder = 1
        Width = 153
      end
    end
    object tsDefiner: TTabSheet
      Caption = #33258#23450#20041#20449#24687
      ImageIndex = 3
      object pnl7: TPanel
        Left = 0
        Top = 0
        Width = 684
        Height = 329
        Align = alClient
        BevelOuter = bvNone
        Color = 16773345
        TabOrder = 0
        object LblProductCustom1: TcxLabel
          Left = 24
          Top = 23
          Caption = #33258#23450#20041'1'#65306
          ParentColor = False
          Style.Color = 16773345
          Transparent = True
        end
        object EdtCustom1: TcxDBTextEdit
          Left = 89
          Top = 19
          DataBinding.DataField = 'custom1'
          DataBinding.DataSource = MainDataSource
          TabOrder = 1
          Width = 160
        end
        object LblProductCustom2: TcxLabel
          Left = 24
          Top = 67
          Caption = #33258#23450#20041'2'#65306
          ParentColor = False
          Style.Color = 16773345
          Transparent = True
        end
        object EdtCustom2: TcxDBTextEdit
          Left = 89
          Top = 63
          DataBinding.DataField = 'custom2'
          DataBinding.DataSource = MainDataSource
          TabOrder = 3
          Width = 160
        end
        object LblProductCustom3: TcxLabel
          Left = 24
          Top = 112
          Caption = #33258#23450#20041'3'#65306
          ParentColor = False
          Style.Color = 16773345
          Transparent = True
        end
        object EdtCustom3: TcxDBTextEdit
          Left = 89
          Top = 108
          DataBinding.DataField = 'custom3'
          DataBinding.DataSource = MainDataSource
          TabOrder = 5
          Width = 160
        end
        object LblProductCustom4: TcxLabel
          Left = 24
          Top = 156
          Caption = #33258#23450#20041'4'#65306
          ParentColor = False
          Style.Color = 16773345
          Transparent = True
        end
        object EdtCustom4: TcxDBTextEdit
          Left = 89
          Top = 152
          DataBinding.DataField = 'custom4'
          DataBinding.DataSource = MainDataSource
          TabOrder = 7
          Width = 160
        end
        object LblProductCustom5: TcxLabel
          Left = 24
          Top = 200
          Caption = #33258#23450#20041'5'#65306
          ParentColor = False
          Style.Color = 16773345
          Transparent = True
        end
        object EdtCustom5: TcxDBTextEdit
          Left = 89
          Top = 196
          DataBinding.DataField = 'custom5'
          DataBinding.DataSource = MainDataSource
          TabOrder = 9
          Width = 160
        end
      end
    end
    object tsPicInfo: TTabSheet
      Caption = #22270#29255#20449#24687
      ImageIndex = 5
      object pnl9: TPanel
        Left = 0
        Top = 0
        Width = 684
        Height = 329
        Align = alClient
        BevelOuter = bvNone
        Color = 16773345
        TabOrder = 0
        object img1: TcxImage
          Left = 0
          Top = 0
          Align = alTop
          TabOrder = 0
          Height = 288
          Width = 684
        end
        object btn1: TcxButton
          Left = 456
          Top = 300
          Width = 81
          Height = 25
          Caption = #26356#25442#22270#29255
          Colors.Default = 16773345
          TabOrder = 1
        end
        object cxlbl1: TcxLabel
          Left = 56
          Top = 304
          Caption = #24314#35758#65306#20026#20102#36991#20813#24433#21709#31995#32479#24615#33021#35831#19981#35201#20351#29992#36739#22823#65288'>=2M'#65289#30340#22270#29255
          ParentFont = False
          Style.Font.Charset = GB2312_CHARSET
          Style.Font.Color = clRed
          Style.Font.Height = -12
          Style.Font.Name = #23435#20307
          Style.Font.Style = []
          Style.IsFontAssigned = True
          Transparent = True
        end
      end
    end
    object tsAttachSub: TTabSheet
      Caption = #23545#26041#31185#30446
      ImageIndex = 6
      object pnl5: TPanel
        Left = 0
        Top = 0
        Width = 684
        Height = 329
        Align = alClient
        BevelOuter = bvNone
        Caption = 'pnl5'
        Color = 16773345
        TabOrder = 0
        object grdAttachSubject: TcxGrid
          Left = 0
          Top = 0
          Width = 684
          Height = 329
          Align = alClient
          PopupMenu = pmGrid
          TabOrder = 0
          OnEnter = grdAttachSubjectEnter
          object cxgrdGrid1DBTableView2: TcxGridDBTableView
            Navigator.Buttons.CustomButtons = <>
            DataController.DataSource = dsSubject
            DataController.Summary.DefaultGroupSummaryItems = <>
            DataController.Summary.FooterSummaryItems = <>
            DataController.Summary.SummaryGroups = <>
            OptionsView.ColumnAutoWidth = True
            OptionsView.GroupByBox = False
            Styles.Background = MainDM.bslBackGroup
            Styles.ContentEven = MainDM.bsEven
            Styles.ContentOdd = MainDM.bsOdd
            Styles.Footer = MainDM.bsTitle
            Styles.Header = MainDM.bsTitle
            Styles.Selection = MainDM.bsSelect
            object cxgrdbclmnSbuCodeName: TcxGridDBColumn
              Caption = #23545#26041#31185#30446
              DataBinding.FieldName = 'attachsubid'
              Width = 143
            end
            object cxgrdbclmnAccAmt: TcxGridDBColumn
              Caption = #26412#24065#37329#39069
              DataBinding.FieldName = 'accamt'
              Width = 118
            end
            object cxgrdbclmnRawAccAmt: TcxGridDBColumn
              Caption = #21407#24065#37329#39069
              DataBinding.FieldName = 'rawaccamt'
              Width = 122
            end
            object cxgrdbclmnAccName: TcxGridDBColumn
              Caption = #20986#32435#36134#25143
              DataBinding.FieldName = 'attachaccountid'
              Width = 144
            end
          end
          object cxgrdGrid1Level2: TcxGridLevel
            GridView = cxgrdGrid1DBTableView2
          end
        end
      end
    end
    object tsInit: TTabSheet
      Caption = #25968#25454#21021#22987#21270
      ImageIndex = 7
      object pnl6: TPanel
        Left = 0
        Top = 0
        Width = 684
        Height = 329
        Align = alClient
        Color = 16773345
        TabOrder = 0
        object cxLabel42: TcxLabel
          Left = 290
          Top = 155
          Caption = #26412#24180#32047#31215#25240#26087#20943#23569#65306
        end
        object cxLabel10: TcxLabel
          Left = 10
          Top = 93
          Caption = #26412#24180#21407#22987#22686#21152#65306
        end
        object cxLabel11: TcxLabel
          Left = 34
          Top = 217
          Caption = #21021#26399#21407#20540#65306
        end
        object cxLabel39: TcxLabel
          Left = 34
          Top = 31
          Caption = #24180#21021#22987#20540#65306
        end
        object cxLabel40: TcxLabel
          Left = 314
          Top = 31
          Caption = #24180#21021#32047#31215#25240#26087#65306
        end
        object cxLabel41: TcxLabel
          Left = 290
          Top = 93
          Caption = #26412#24180#32047#31215#25240#26087#22686#21152#65306
        end
        object cxLabel43: TcxLabel
          Left = 314
          Top = 217
          Caption = #26399#21021#32047#31215#25240#26087#65306
        end
        object cxLabel44: TcxLabel
          Left = 314
          Top = 277
          Caption = #26412#24180#35745#25552#25240#26087#65306
        end
        object cxLabel9: TcxLabel
          Left = 10
          Top = 155
          Caption = #26412#24180#21407#22987#20943#23569#65306
        end
      end
      object cxdbedtSumDebit: TcxDBTextEdit
        Left = 96
        Top = 89
        DataBinding.DataField = 'sumdebit'
        DataBinding.DataSource = dsInit
        TabOrder = 1
        Width = 150
      end
      object cxdbedtYBastDebit: TcxDBTextEdit
        Left = 96
        Top = 27
        DataBinding.DataField = 'ybastdebit'
        DataBinding.DataSource = dsInit
        TabOrder = 2
        Width = 150
      end
      object cxdbedtSumCredit: TcxDBTextEdit
        Left = 96
        Top = 151
        DataBinding.DataField = 'sumcredit'
        DataBinding.DataSource = dsInit
        TabOrder = 3
        Width = 150
      end
      object cxdbedtBastDebit: TcxDBTextEdit
        Left = 96
        Top = 213
        DataBinding.DataField = 'bastdebit'
        DataBinding.DataSource = dsInit
        TabOrder = 4
        Width = 150
      end
      object cxdbedtYDprCredit: TcxDBTextEdit
        Left = 400
        Top = 27
        DataBinding.DataField = 'ydprcredit'
        DataBinding.DataSource = dsInit
        TabOrder = 5
        Width = 150
      end
      object cxdbedtSumDepDebit: TcxDBTextEdit
        Left = 400
        Top = 89
        DataBinding.DataField = 'sumdprdebit'
        DataBinding.DataSource = dsInit
        TabOrder = 6
        Width = 150
      end
      object cxdbedtSumDepCredit: TcxDBTextEdit
        Left = 400
        Top = 151
        DataBinding.DataField = 'sumdprcredbit'
        DataBinding.DataSource = dsInit
        TabOrder = 7
        Width = 150
      end
      object cxdbedtDprCredit: TcxDBTextEdit
        Left = 400
        Top = 213
        DataBinding.DataField = 'dprcredit'
        DataBinding.DataSource = dsInit
        TabOrder = 8
        Width = 150
      end
      object cxdbedtYDprAmt: TcxDBTextEdit
        Left = 400
        Top = 273
        DataBinding.DataField = 'ydepramt'
        DataBinding.DataSource = dsInit
        TabOrder = 9
        Width = 150
      end
      object cxdbchckbxCleared: TcxDBCheckBox
        Left = 80
        Top = 272
        Caption = #35813#22266#23450#36164#20135#24050#34987#28165#29702
        DataBinding.DataField = 'cleared'
        DataBinding.DataSource = MainDataSource
        TabOrder = 10
      end
    end
  end
  object pnl10: TPanel [2]
    Left = 0
    Top = 0
    Width = 692
    Height = 45
    Align = alTop
    Color = 16773345
    TabOrder = 4
    object clbr1: TCoolBar
      Left = 1
      Top = 1
      Width = 180
      Height = 43
      Align = alLeft
      Bands = <>
      Vertical = True
      object sbtnSDelete: TSpeedButton
        Left = 130
        Top = -2
        Width = 38
        Height = 40
        Hint = #21024#38500
        Caption = #21024#38500
        Flat = True
        Glyph.Data = {
          36040000424D3604000000000000360000002800000010000000100000000100
          2000000000000004000000000000000000000000000000000000FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF000000
          00000000FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF000000FF00FFFFFF00FFFFFF00FFFFFF000000
          FF000000FF000000FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
          FF000000FF000000FF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00000000000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF000000FF000000FF000000FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00000000000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF000000FF000000FF000000FF0000000000FFFFFF00FFFFFF000000
          00000000FF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF000000FF000000FF000000FF0000000000000000000000
          FF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF000000FF000000FF000000FF000000FF000000
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00000000000000FF000000FF000000FF000000
          0000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00000000000000FF000000FF000000FF000000FF000000
          FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF0000000000000000000000FF000000FF000000FF00FFFFFF00FFFFFF000000
          FF000000FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
          00000000FF000000FF000000FF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF000000FF000000FF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
          FF000000FF000000FF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF000000FF000000FF0000000000FFFFFF00FFFFFF00FFFFFF000000
          FF000000FF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF000000FF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00}
        Layout = blGlyphTop
        ParentShowHint = False
        ShowHint = True
        OnClick = sbtnSDeleteClick
      end
      object sbtnSNew: TSpeedButton
        Left = 3
        Top = -4
        Width = 38
        Height = 40
        Hint = #22686#21152
        Caption = #26032#22686
        Flat = True
        Glyph.Data = {
          36040000424D3604000000000000360000002800000010000000100000000100
          2000000000000004000000000000000000000000000000000000FFFFFF00FFFF
          FF00FFFFFF000000000000000000000000000000000000000000000000000000
          00000000000000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
          FF00FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFF
          FF00FFFFFF0000000000FFFFFF00BFBFBF00BFBFBF00BFBFBF00BFBFBF00BFBF
          BF00BFBFBF00BFBFBF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFF
          FF00FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFF
          FF00FFFFFF0000000000FFFFFF00BFBFBF00BFBFBF00BFBFBF00FFFFFF00BFBF
          BF00BFBFBF00BFBFBF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFF
          FF00FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00BFBF
          BF00BFBFBF00BFBFBF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFF
          FF00FFFFFF0000000000FFFFFF00BFBFBF00BFBFBF00BFBFBF00FFFFFF00BFBF
          BF00BFBFBF00BFBFBF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFF
          FF00FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
          0000FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFF
          FF00FFFFFF0000000000FFFFFF00BFBFBF0000007F0000007F0000000000FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00000000000000000000007F0000007F0000007F0000000000FFFF
          FF000000000000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
          FF00FFFFFF000000000000007F000000FF000000FF000000FF0000000000FFFF
          FF0000000000FFFFFF00FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF0000007F0000007F000000FF0000007F0000000000FFFFFF00FFFF
          FF0000000000FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF0000007F000000FF000000FF0000007F000000FF0000000000FFFFFF00FFFF
          FF000000000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
          7F000000FF000000FF0000007F000000FF000000000000000000000000000000
          000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000007F000000
          FF0000007F0000007F0000007F0000000000FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000007F000000
          7F0000007F0000007F00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00}
        Layout = blGlyphTop
        ParentShowHint = False
        ShowHint = True
        OnClick = btnContinueClick
      end
      object sbtnSSave: TSpeedButton
        Left = 88
        Top = -2
        Width = 38
        Height = 40
        Hint = #20445#23384
        Caption = #20445#23384'&'
        Flat = True
        Glyph.Data = {
          36040000424D3604000000000000360000002800000010000000100000000100
          2000000000000004000000000000000000000000000000000000FFFFFF00FFFF
          FF00FFFFFF000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00000000004A4A4A0000000000C2C2C200C2C2C2009E9E9E009E9E9E009E9E
          9E00000000004A4A4A004A4A4A0000000000FFFFFF00FFFFFF00FFFFFF000000
          00005656560056565600000000009E9E9E00C2C2C200C2C2C200C2C2C2009E9E
          9E0000000000565656004A4A4A0000000000FFFFFF00FFFFFF00FFFFFF000000
          00006262620056565600000000000E0E0E000E0E0E000E0E0E000E0E0E000E0E
          0E0000000000565656005656560000000000FFFFFF00FFFFFF00FFFFFF000000
          000062626200626262004A4A4A004A4A4A004A4A4A004A4A4A004A4A4A004A4A
          4A004A4A4A00626262005656560000000000FFFFFF00FFFFFF00FFFFFF000000
          00006E6E6E006E6E6E0062626200626262006262620062626200626262006262
          620062626200626262006262620000000000FFFFFF00FFFFFF00FFFFFF000000
          00007A7A7A006E6E6E006E6E6E006E6E6E006E6E6E006E6E6E006E6E6E006E6E
          6E006E6E6E006E6E6E006262620000000000FFFFFF00FFFFFF00FFFFFF000000
          00007A7A7A003232320032323200323232003232320032323200323232003232
          320032323200323232006E6E6E0000000000FFFFFF00FFFFFF00FFFFFF000000
          00008686860000000000E6E6E600E6E6E600E6E6E600E6E6E600E6E6E600E6E6
          E600E6E6E600323232007A7A7A0000000000FFFFFF00FFFFFF00FFFFFF000000
          00009292920000000000E6E6E6004848FF006B6BFF008E8EFF00B1B1FF00B1B1
          FF00E6E6E600323232008686860000000000FFFFFF00FFFFFF00FFFFFF000000
          00009E9E9E0000000000E6E6E600E6E6E600E6E6E600E6E6E600E6E6E600E6E6
          E600E6E6E600323232009292920000000000FFFFFF00FFFFFF00FFFFFF000000
          0000AAAAAA0000000000E6E6E6004848FF004848FF006B6BFF008E8EFF00B1B1
          FF00E6E6E600323232009E9E9E0000000000FFFFFF00FFFFFF00FFFFFF000000
          0000AAAAAA0000000000E6E6E600E6E6E600E6E6E600E6E6E600E6E6E600E6E6
          E600E6E6E60032323200AAAAAA0000000000FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00}
        Layout = blGlyphTop
        ParentShowHint = False
        ShowHint = True
        OnClick = sbtnSSaveClick
      end
      object sbtnCopy: TSpeedButton
        Left = 47
        Top = -2
        Width = 38
        Height = 40
        Hint = #22797#21046
        Caption = #22797#21046
        Flat = True
        Glyph.Data = {
          36030000424D3603000000000000360000002800000010000000100000000100
          18000000000000030000120B0000120B00000000000000000000FFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFC60151C60151C60050C60050C60050C60050C60050C600
          50C60050C60050C60050FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCF276AFCE9EDFD
          EBEFFDEDF1FDF0F3FDF2F4FEF4F6FEF7F8FEF9FAFEFBFCC60050FFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFE78CAEECE0E0FDEBEFFDEDF1FDF0F3FDF2F4FEF4F6FEF7
          F8FEF9FAFEFBFCC60050C60050C60050C50151D23573F4C6D7F1BCCF2F7240CE
          D7CCFEF5F7FDF3F6FDF3F5FEF4F6FEF7F8FEF9FAFEFBFCC60050C60050FCE9ED
          FDEBEFFDEDF1FDF0F3F4C8D80055160F5F24AEC5B2FEF8F9FEF5F7FEF4F6FEF7
          F8FEF9FAFEFBFCC60050C60050FCE9EDFDEBEFFDEDF1FDF0F3FAE6EC00551650
          A96E075A1D7FA789FEFAFBFEF5F7FEF7F8FEF9FAFEFBFCC60050C60151FCE9ED
          FDEBEFDDDAD55E8F6800551610612765DE8D7ED09F1E6B344F895EEEECE9FEF7
          F8FEF9FAFEFBFCC60050C90C58FCE9EDCDCFC60F5E2302641B1EA74442CB6B65
          DE8D87E7ADAAEACB4A8D622F7340CED8CEFEF9FAFEFBFCC60050CF286BFCE9ED
          0F5E2300781F02BF331FC24C42C26965DE8D87E7AD9EDEBE4A8D622F7340EEEC
          EAFEF9FAFEFBFCC60050D23372FCE9ED00551600711D00551605581B00551665
          DE8D75C3941E6B345F936DFEF6F8D64881C90D59C60050C60050D23372FCE9ED
          0055165E8E68ADBFAECBCBC40055164AA067075A1D9FBCA5FEFAFBFEF5F7C90D
          59E58CAFC90F5ACC2B6CCF286BFCE9EDBDC5B9FDEDF1FDF0F3F4C9D80055160F
          5F24CED9CFFEF8F9FEF5F7FEF4F6C60050C60050CC2B6CFFFFFFC90B57FCE9ED
          FDEBEFFDEDF1FDF0F3F1BCCF2F703EE4C4CFEBA4C0D64A82C90D59C60050C600
          50CC2B6CFFFFFFFFFFFFC60050FCE9EDFDEBEFFDEDF1FDF0F3FDF2F4FEF4F6F6
          D3DFF9E5EDF3CADAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC60050FCE9ED
          FDEBEFFDEDF1FDF0F3FDF2F4FEF4F6D4407BD23775D6578BFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFC60050C60050C60050C60050C50151C50251C50251C5
          0151CB2B6CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
        Layout = blGlyphTop
        ParentShowHint = False
        ShowHint = True
        OnClick = sbtnCopyClick
      end
    end
    object btnCreateVoucher: TcxButton
      Left = 196
      Top = 8
      Width = 90
      Height = 28
      Hint = #21024#38500#20973#35777
      Caption = #21024#38500#20973#35777
      Colors.Default = 16773345
      TabOrder = 2
      OnClick = btnCreateVoucherClick
    end
    object btnLoadVoucher: TcxButton
      Left = 292
      Top = 8
      Width = 90
      Height = 28
      Hint = #35843#38405#20973#35777
      Caption = #35843#38405#20973#35777
      Colors.Default = 16773345
      TabOrder = 1
      OnClick = btnLoadVoucherClick
    end
  end
  inherited btnPrint: TcxButton
    Left = 459
    Top = 9
    ExplicitLeft = 459
    ExplicitTop = 9
  end
  inherited edtPrint: TcxLookupComboBox
    Left = 553
    Top = 11
    ExplicitLeft = 553
    ExplicitTop = 11
  end
  inherited MainDataSource: TDataSource
    DataSet = qryMainDataSet
    Left = 542
    Top = 79
  end
  inherited qryDynDtl: TUniQuery
    Left = 632
    Top = 40
  end
  object qryAttach: TUniQuery
    SQLInsert.Strings = (
      'INSERT INTO tfb_fixastAttach'
      
        '  (fixedassetid, bno, name, specific, unit, quantity, amount, us' +
        'edate, remark)'
      'VALUES'
      
        '  (:fixedassetid, :bno, :name, :specific, :unit, :quantity, :amo' +
        'unt, :usedate, :remark)')
    SQLDelete.Strings = (
      'DELETE FROM tfb_fixastAttach'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    SQLUpdate.Strings = (
      'UPDATE tfb_fixastAttach'
      'SET'
      
        '  fixedassetid = :fixedassetid, bno = :bno, name = :name, specif' +
        'ic = :specific, unit = :unit, quantity = :quantity, amount = :am' +
        'ount, usedate = :usedate, remark = :remark'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    SQLLock.Strings = (
      'SELECT * FROM tfb_fixastAttach'
      'WITH (UPDLOCK, ROWLOCK, HOLDLOCK)'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    SQLRefresh.Strings = (
      
        'SELECT fixedassetid, bno, name, specific, unit, quantity, amount' +
        ', usedate, remark FROM tfb_fixastAttach'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    Connection = MainDM.UniConn
    SQL.Strings = (
      'Select * From tfb_fixastAttach'
      ' Where FixedAssetID=:FixedAssetID')
    CachedUpdates = True
    Options.PrepareUpdateSQL = True
    Options.SetFieldsReadOnly = False
    Options.RequiredFields = False
    Options.QueryRecCount = True
    Options.AutoPrepare = True
    Left = 496
    Top = 272
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'FixedAssetID'
        Value = nil
      end>
    object intgrfldAttachfixedassetid: TIntegerField
      FieldName = 'fixedassetid'
    end
    object intgrfldAttachbno: TIntegerField
      FieldName = 'bno'
    end
    object qryAttachname: TStringField
      FieldName = 'name'
      Size = 60
    end
    object qryAttachspecific: TStringField
      FieldName = 'specific'
      Size = 60
    end
    object qryAttachunit: TStringField
      FieldName = 'unit'
      Size = 30
    end
    object fltfldAttachquantity: TFloatField
      FieldName = 'quantity'
    end
    object fltfldAttachamount: TFloatField
      FieldName = 'amount'
    end
    object qryAttachusedate: TDateTimeField
      FieldName = 'usedate'
    end
    object qryAttachremark: TStringField
      FieldName = 'remark'
      Size = 200
    end
  end
  object dsAttach: TDataSource
    DataSet = qryAttach
    Left = 549
    Top = 267
  end
  object dsSubject: TDataSource
    DataSet = qrySubject
    Left = 549
    Top = 323
  end
  object qrySubject: TUniQuery
    SQLInsert.Strings = (
      'INSERT INTO tfb_fixastaccount'
      
        '  (fixedassetid, bno, attachsubid, accamt, rawaccamt, attachacco' +
        'untid, moneyid, excgrate)'
      'VALUES'
      
        '  (:fixedassetid, :bno, :attachsubid, :accamt, :rawaccamt, :atta' +
        'chaccountid, :moneyid, :excgrate)')
    SQLDelete.Strings = (
      'DELETE FROM tfb_fixastaccount'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    SQLUpdate.Strings = (
      'UPDATE tfb_fixastaccount'
      'SET'
      
        '  fixedassetid = :fixedassetid, bno = :bno, attachsubid = :attac' +
        'hsubid, accamt = :accamt, rawaccamt = :rawaccamt, attachaccounti' +
        'd = :attachaccountid, moneyid = :moneyid, excgrate = :excgrate'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    SQLLock.Strings = (
      'SELECT * FROM tfb_fixastaccount'
      'WITH (UPDLOCK, ROWLOCK, HOLDLOCK)'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    SQLRefresh.Strings = (
      
        'SELECT fixedassetid, bno, attachsubid, accamt, rawaccamt, attach' +
        'accountid, moneyid, excgrate FROM tfb_fixastaccount'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    Connection = MainDM.UniConn
    SQL.Strings = (
      'select * from tfb_fixastaccount '
      ' Where FixedAssetID=:FixedAssetID')
    CachedUpdates = True
    Options.PrepareUpdateSQL = True
    Options.SetFieldsReadOnly = False
    Options.RequiredFields = False
    Options.QueryRecCount = True
    Options.AutoPrepare = True
    Left = 496
    Top = 320
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'FixedAssetID'
        Value = nil
      end>
    object fltfldSubjectaccamt: TFloatField
      FieldName = 'accamt'
    end
    object fltfldSubjectrawaccamt: TFloatField
      FieldName = 'rawaccamt'
    end
    object intgrfldSubjectfixedassetid: TIntegerField
      FieldName = 'fixedassetid'
    end
    object intgrfldSubjectbno: TIntegerField
      FieldName = 'bno'
    end
    object intgrfldSubjectattachsubid: TIntegerField
      FieldName = 'attachsubid'
    end
    object intgrfldSubjectattachaccountid: TIntegerField
      FieldName = 'attachaccountid'
    end
    object intgrfldSubjectmoneyid: TIntegerField
      FieldName = 'moneyid'
    end
    object fltfldSubjectexcgrate: TFloatField
      FieldName = 'excgrate'
    end
  end
  object qryOwnerDep: TUniQuery
    SQLInsert.Strings = (
      'INSERT INTO tfb_fixastdept'
      
        '  (deptid, fixedassetid, bno, faadjid, pcode, ownerrate, used, s' +
        'ubjectid)'
      'VALUES'
      
        '  (:deptid, :fixedassetid, :bno, :faadjid, :pcode, :ownerrate, :' +
        'used, :subjectid)')
    SQLDelete.Strings = (
      'DELETE FROM tfb_fixastdept'
      'WHERE'
      '  deptid = :Old_deptid and fixedassetid = :Old_fixedassetid')
    SQLUpdate.Strings = (
      'UPDATE tfb_fixastdept'
      'SET'
      
        '  bno = :bno, faadjid = :faadjid, pcode = :pcode, ownerrate = :o' +
        'wnerrate, used = :used, subjectid = :subjectid'
      'WHERE'
      '  deptid = :Old_deptid and fixedassetid = :Old_fixedassetid')
    SQLLock.Strings = (
      'SELECT * FROM tfb_fixastdept'
      'WITH (UPDLOCK, ROWLOCK, HOLDLOCK)'
      'WHERE'
      '  deptid = :Old_deptid and fixedassetid = :Old_fixedassetid')
    SQLRefresh.Strings = (
      
        'SELECT deptid, fixedassetid, bno, faadjid, pcode, ownerrate, use' +
        'd, subjectid FROM tfb_fixastdept'
      'WHERE'
      '  deptid = :Old_deptid and fixedassetid = :Old_fixedassetid')
    Connection = MainDM.UniConn
    SQL.Strings = (
      'Select * From tfb_fixastdept'
      ' Where FixedAssetID=:FixedAssetID And Used=1')
    CachedUpdates = True
    Options.PrepareUpdateSQL = True
    Options.SetFieldsReadOnly = False
    Options.RequiredFields = False
    Options.QueryRecCount = True
    Options.AutoPrepare = True
    Left = 496
    Top = 224
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'FixedAssetID'
        Value = nil
      end>
    object intgrfldOwnerDepdeptid: TIntegerField
      FieldName = 'deptid'
    end
    object intgrfldOwnerDepfixedassetid: TIntegerField
      FieldName = 'fixedassetid'
    end
    object intgrfldOwnerDepbno: TIntegerField
      FieldName = 'bno'
    end
    object intgrfldOwnerDepfaadjid: TIntegerField
      FieldName = 'faadjid'
    end
    object intgrfldOwnerDeppcode: TIntegerField
      FieldName = 'pcode'
    end
    object fltfldOwnerDepownerrate: TFloatField
      FieldName = 'ownerrate'
    end
    object blnfldOwnerDepused: TBooleanField
      FieldName = 'used'
    end
    object intgrfldOwnerDepsubjectid: TIntegerField
      FieldName = 'subjectid'
    end
  end
  object dsOwnerDep: TDataSource
    DataSet = qryOwnerDep
    Left = 549
    Top = 219
  end
  object qryMainDataSet: TUniQuery
    SQLInsert.Strings = (
      'INSERT INTO tfb_fixedassets'
      '  (fixedassetid, filid, fadeltypeid, newtypeid, statusid'
      ', fatypeid, deprmethodid, addvoucherid, delvoucherid, cardcode'
      ', assetcode, name, specific, location, useddate'
      
        ', planusemonth, sumusedmonth, startsumusedmonth, planworkvalue, ' +
        'sumworkedvalue'
      
        ', startsumworkedvalue, workunit, rawamt, sumdepramt, startsumdep' +
        'ramt'
      ', remainamt, remainrate, monthdepramt, monthdeprrate, deproption'
      ', cleardate, clearincome, clearpay, clearmemo, cleared'
      ', addr, vendorname, producename, initflag, startrawamt'
      ', astsubid, dprsubid, clearsubid, price, quantity'
      ', foreignamt, foreigncurid, unit'
      ', custom1, custom2, custom3, custom4, custom5'
      
        ', pic, pictype, incomesubid, incomeaccountid, paysubid, payaccou' +
        'ntid, taxsubid, taxamount)'
      'VALUES'
      '  (:fixedassetid, :filid, :fadeltypeid, :newtypeid, :statusid'
      
        ', :fatypeid, :deprmethodid, :addvoucherid, :delvoucherid, :cardc' +
        'ode'
      ', :assetcode, :name, :specific, :location, :useddate'
      
        ', :planusemonth, :sumusedmonth, :startsumusedmonth, :planworkval' +
        'ue, :sumworkedvalue'
      
        ', :startsumworkedvalue, :workunit, :rawamt, :sumdepramt, :starts' +
        'umdepramt'
      
        ', :remainamt, :remainrate, :monthdepramt, :monthdeprrate, :depro' +
        'ption'
      ', :cleardate, :clearincome, :clearpay, :clearmemo, :cleared'
      ', :addr, :vendorname, :producename, :initflag, :startrawamt'
      ', :astsubid, :dprsubid, :clearsubid, :price, :quantity'
      ', :foreignamt, :foreigncurid, :unit'
      ', :custom1, :custom2, :custom3, :custom4, :custom5'
      
        ', :pic, :pictype, :incomesubid, :incomeaccountid, :paysubid, :pa' +
        'yaccountid, :taxsubid, :taxamount)')
    SQLDelete.Strings = (
      'DELETE FROM tfb_fixedassets'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    SQLUpdate.Strings = (
      'UPDATE tfb_fixedassets'
      'SET'
      
        '  fixedassetid = :fixedassetid, filid = :filid, fadeltypeid = :f' +
        'adeltypeid, newtypeid = :newtypeid, statusid = :statusid, fatype' +
        'id = :fatypeid, deprmethodid = :deprmethodid, addvoucherid = :ad' +
        'dvoucherid, delvoucherid = :delvoucherid, cardcode = :cardcode, ' +
        'assetcode = :assetcode, name = :name, specific = :specific, loca' +
        'tion = :location, useddate = :useddate, planusemonth = :planusem' +
        'onth, sumusedmonth = :sumusedmonth, startsumusedmonth = :startsu' +
        'musedmonth, planworkvalue = :planworkvalue, sumworkedvalue = :su' +
        'mworkedvalue, startsumworkedvalue = :startsumworkedvalue, workun' +
        'it = :workunit, rawamt = :rawamt, sumdepramt = :sumdepramt, star' +
        'tsumdepramt = :startsumdepramt, remainamt = :remainamt, remainra' +
        'te = :remainrate, monthdepramt = :monthdepramt, monthdeprrate = ' +
        ':monthdeprrate, deproption = :deproption, cleardate = :cleardate' +
        ', clearincome = :clearincome, clearpay = :clearpay, clearmemo = ' +
        ':clearmemo, cleared = :cleared, addr = :addr, vendorname = :vend' +
        'orname, producename = :producename, initflag = :initflag, startr' +
        'awamt = :startrawamt, astsubid = :astsubid, dprsubid = :dprsubid' +
        ', clearsubid = :clearsubid, price = :price, quantity = :quantity' +
        ', foreignamt = :foreignamt, foreigncurid = :foreigncurid, unit =' +
        ' :unit, custom1 = :custom1, custom2 = :custom2, custom3 = :custo' +
        'm3, custom4 = :custom4, custom5 = :custom5, pic = :pic, pictype ' +
        '= :pictype, incomesubid = :incomesubid, incomeaccountid = :incom' +
        'eaccountid, paysubid = :paysubid, payaccountid = :payaccountid, ' +
        'taxsubid = :taxsubid, taxamount = :taxamount'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    SQLLock.Strings = (
      'SELECT * FROM tfb_fixedassets'
      'WITH (UPDLOCK, ROWLOCK, HOLDLOCK)'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    SQLRefresh.Strings = (
      
        'SELECT fixedassetid, filid, fadeltypeid, newtypeid, statusid, fa' +
        'typeid, deprmethodid, addvoucherid, delvoucherid, cardcode, asse' +
        'tcode, name, specific, location, useddate, planusemonth, sumused' +
        'month, startsumusedmonth, planworkvalue, sumworkedvalue, startsu' +
        'mworkedvalue, workunit, rawamt, sumdepramt, startsumdepramt, rem' +
        'ainamt, remainrate, monthdepramt, monthdeprrate, deproption, cle' +
        'ardate, clearincome, clearpay, clearmemo, cleared, addr, vendorn' +
        'ame, producename, initflag, startrawamt, astsubid, dprsubid, cle' +
        'arsubid, price, quantity, foreignamt, foreigncurid, unit, custom' +
        '1, custom2, custom3, custom4, custom5, pic, pictype, incomesubid' +
        ', incomeaccountid, paysubid, payaccountid, taxsubid, taxamount F' +
        'ROM tfb_fixedassets'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    Connection = MainDM.UniConn
    SQL.Strings = (
      'Select top 1 * From tfb_fixedassets m'
      ' Where FixedAssetID=:FixedAssetID')
    CachedUpdates = True
    Options.SetFieldsReadOnly = False
    Options.RequiredFields = False
    OnCalcFields = qryMainDataSetCalcFields
    Left = 496
    Top = 80
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'FixedAssetID'
        Value = nil
      end>
    object intgrfldMainDataSetfixedassetid: TIntegerField
      FieldName = 'fixedassetid'
    end
    object intgrfldMainDataSetfilid: TIntegerField
      FieldName = 'filid'
    end
    object intgrfldMainDataSetfadeltypeid: TIntegerField
      FieldName = 'fadeltypeid'
    end
    object intgrfldMainDataSetnewtypeid: TIntegerField
      FieldName = 'newtypeid'
    end
    object intgrfldMainDataSetstatusid: TIntegerField
      FieldName = 'statusid'
    end
    object intgrfldMainDataSetfatypeid: TIntegerField
      FieldName = 'fatypeid'
    end
    object intgrfldMainDataSetdeprmethodid: TIntegerField
      FieldName = 'deprmethodid'
    end
    object intgrfldMainDataSetaddvoucherid: TIntegerField
      FieldName = 'addvoucherid'
    end
    object intgrfldMainDataSetdelvoucherid: TIntegerField
      FieldName = 'delvoucherid'
    end
    object qryMainDataSetcardcode: TStringField
      FieldName = 'cardcode'
      Size = 40
    end
    object qryMainDataSetassetcode: TStringField
      FieldName = 'assetcode'
      Size = 40
    end
    object qryMainDataSetname: TStringField
      FieldName = 'name'
      Size = 60
    end
    object qryMainDataSetspecific: TStringField
      FieldName = 'specific'
      Size = 60
    end
    object qryMainDataSetlocation: TStringField
      FieldName = 'location'
      Size = 60
    end
    object qryMainDataSetuseddate: TDateTimeField
      FieldName = 'useddate'
    end
    object intgrfldMainDataSetplanusemonth: TIntegerField
      FieldName = 'planusemonth'
    end
    object intgrfldMainDataSetsumusedmonth: TIntegerField
      FieldName = 'sumusedmonth'
    end
    object intgrfldMainDataSetstartsumusedmonth: TIntegerField
      FieldName = 'startsumusedmonth'
    end
    object fltfldMainDataSetplanworkvalue: TFloatField
      FieldName = 'planworkvalue'
    end
    object fltfldMainDataSetsumworkedvalue: TFloatField
      FieldName = 'sumworkedvalue'
    end
    object fltfldMainDataSetstartsumworkedvalue: TFloatField
      FieldName = 'startsumworkedvalue'
    end
    object fltfldMainDataSetrawamt: TFloatField
      FieldName = 'rawamt'
    end
    object qryMainDataSetworkunit: TStringField
      FieldName = 'workunit'
      Size = 30
    end
    object fltfldMainDataSetsumdepramt: TFloatField
      FieldName = 'sumdepramt'
    end
    object fltfldMainDataSetstartsumdepramt: TFloatField
      FieldName = 'startsumdepramt'
    end
    object fltfldMainDataSetremainamt: TFloatField
      FieldName = 'remainamt'
    end
    object fltfldMainDataSetremainrate: TFloatField
      FieldName = 'remainrate'
    end
    object fltfldMainDataSetmonthdepramt: TFloatField
      FieldName = 'monthdepramt'
    end
    object fltfldMainDataSetmonthdeprrate: TFloatField
      FieldName = 'monthdeprrate'
    end
    object blnfldMainDataSetdeproption: TBooleanField
      FieldName = 'deproption'
    end
    object qryMainDataSetcleardate: TDateTimeField
      FieldName = 'cleardate'
    end
    object fltfldMainDataSetclearincome: TFloatField
      FieldName = 'clearincome'
    end
    object fltfldMainDataSetclearpay: TFloatField
      FieldName = 'clearpay'
    end
    object qryMainDataSetclearmemo: TStringField
      FieldName = 'clearmemo'
      Size = 60
    end
    object blnfldMainDataSetcleared: TBooleanField
      FieldName = 'cleared'
    end
    object qryMainDataSetaddr: TStringField
      FieldName = 'addr'
      Size = 60
    end
    object qryMainDataSetvendorname: TStringField
      FieldName = 'vendorname'
      Size = 60
    end
    object qryMainDataSetproducename: TStringField
      FieldName = 'producename'
      Size = 60
    end
    object blnfldMainDataSetinitflag: TBooleanField
      FieldName = 'initflag'
    end
    object fltfldMainDataSetstartrawamt: TFloatField
      FieldName = 'startrawamt'
    end
    object intgrfldMainDataSetastsubid: TIntegerField
      FieldName = 'astsubid'
    end
    object intgrfldMainDataSetdprsubid: TIntegerField
      FieldName = 'dprsubid'
    end
    object intgrfldMainDataSetclearsubid: TIntegerField
      FieldName = 'clearsubid'
    end
    object fltfldMainDataSetprice: TFloatField
      FieldName = 'price'
    end
    object fltfldMainDataSetquantity: TFloatField
      FieldName = 'quantity'
    end
    object fltfldMainDataSetforeignamt: TFloatField
      FieldName = 'foreignamt'
    end
    object intgrfldMainDataSetforeigncurid: TIntegerField
      FieldName = 'foreigncurid'
    end
    object qryMainDataSetunit: TStringField
      FieldName = 'unit'
      Size = 30
    end
    object qryMainDataSetpic: TBlobField
      FieldName = 'pic'
    end
    object qryMainDataSetpictype: TStringField
      FieldName = 'pictype'
      Size = 6
    end
    object intgrfldMainDataSetincomesubid: TIntegerField
      FieldName = 'incomesubid'
    end
    object intgrfldMainDataSetincomeaccountid: TIntegerField
      FieldName = 'incomeaccountid'
    end
    object intgrfldMainDataSetpaysubid: TIntegerField
      FieldName = 'paysubid'
    end
    object intgrfldMainDataSetpayaccountid: TIntegerField
      FieldName = 'payaccountid'
    end
    object intgrfldMainDataSettaxsubid: TIntegerField
      FieldName = 'taxsubid'
    end
    object fltfldMainDataSettaxamount: TFloatField
      FieldName = 'taxamount'
    end
    object qryMainDataSetcustom1: TStringField
      FieldName = 'custom1'
      Size = 60
    end
    object u: TStringField
      FieldName = 'custom2'
      Size = 60
    end
    object qryMainDataSetcustom3: TStringField
      FieldName = 'custom3'
      Size = 60
    end
    object qryMainDataSetcustom4: TStringField
      FieldName = 'custom4'
      Size = 60
    end
    object qryMainDataSetcustom5: TStringField
      FieldName = 'custom5'
      Size = 60
    end
    object fltfldMainDataSetNetValue: TFloatField
      FieldKind = fkCalculated
      FieldName = 'NetValue'
      OnChange = fltfldMainDataSetNetValueChange
      Calculated = True
    end
  end
  object pmGrid: TPopupMenu
    OnPopup = pmGridPopup
    Left = 557
    Top = 26
    object mniAdd: TMenuItem
      Caption = #26032#22686
      OnClick = mniAddClick
    end
    object mniDel: TMenuItem
      Caption = #21024#38500
      OnClick = mniDelClick
    end
  end
  object dsInit: TDataSource
    DataSet = qryInit
    Left = 549
    Top = 171
  end
  object qryInit: TUniQuery
    SQLInsert.Strings = (
      'INSERT INTO tfb_fixedassetsinit'
      
        '  (fixedassetid, ybastdebit, sumdebit, sumcredit, bastdebit, ydp' +
        'rcredit, sumdprdebit, sumdprcredbit, dprcredit, ydepramt)'
      'VALUES'
      
        '  (:fixedassetid, :ybastdebit, :sumdebit, :sumcredit, :bastdebit' +
        ', :ydprcredit, :sumdprdebit, :sumdprcredbit, :dprcredit, :ydepra' +
        'mt)')
    SQLDelete.Strings = (
      'DELETE FROM tfb_fixedassetsinit'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    SQLUpdate.Strings = (
      'UPDATE tfb_fixedassetsinit'
      'SET'
      
        '  fixedassetid = :fixedassetid, ybastdebit = :ybastdebit, sumdeb' +
        'it = :sumdebit, sumcredit = :sumcredit, bastdebit = :bastdebit, ' +
        'ydprcredit = :ydprcredit, sumdprdebit = :sumdprdebit, sumdprcred' +
        'bit = :sumdprcredbit, dprcredit = :dprcredit, ydepramt = :ydepra' +
        'mt'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    SQLLock.Strings = (
      'SELECT * FROM tfb_fixedassetsinit'
      'WITH (UPDLOCK, ROWLOCK, HOLDLOCK)'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    SQLRefresh.Strings = (
      
        'SELECT fixedassetid, ybastdebit, sumdebit, sumcredit, bastdebit,' +
        ' ydprcredit, sumdprdebit, sumdprcredbit, dprcredit, ydepramt FRO' +
        'M tfb_fixedassetsinit'
      'WHERE'
      '  fixedassetid = :Old_fixedassetid')
    Connection = MainDM.UniConn
    SQL.Strings = (
      'Select * From tfb_fixedassetsinit'
      'Where FixedAssetID=:FixedAssetID')
    CachedUpdates = True
    Options.PrepareUpdateSQL = True
    Options.SetFieldsReadOnly = False
    Options.RequiredFields = False
    Options.QueryRecCount = True
    Options.AutoPrepare = True
    Left = 496
    Top = 176
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'FixedAssetID'
        Value = nil
      end>
    object intgrfldInitfixedassetid: TIntegerField
      FieldName = 'fixedassetid'
    end
    object fltfldInitybastdebit: TFloatField
      FieldName = 'ybastdebit'
    end
    object fltfldInitsumdebit: TFloatField
      FieldName = 'sumdebit'
    end
    object fltfldInitsumcredit: TFloatField
      FieldName = 'sumcredit'
    end
    object fltfldInitbastdebit: TFloatField
      FieldName = 'bastdebit'
    end
    object fltfldInitydprcredit: TFloatField
      FieldName = 'ydprcredit'
    end
    object fltfldInitsumdprdebit: TFloatField
      FieldName = 'sumdprdebit'
    end
    object fltfldInitsumdprcredbit: TFloatField
      FieldName = 'sumdprcredbit'
    end
    object fltfldInitdprcredit: TFloatField
      FieldName = 'dprcredit'
    end
    object fltfldInitydepramt: TFloatField
      FieldName = 'ydepramt'
    end
  end
  object qryTemp: TUniQuery
    Connection = MainDM.UniConn
    CachedUpdates = True
    Options.PrepareUpdateSQL = True
    Options.SetFieldsReadOnly = False
    Options.RequiredFields = False
    Options.QueryRecCount = True
    Options.AutoPrepare = True
    Left = 496
    Top = 128
  end
  object dsTemp: TDataSource
    DataSet = qryTemp
    Left = 549
    Top = 123
  end
end
